  FIND FIRST _File WHERE _File._File-Name EQ SESSION:PARAMETER NO-LOCK NO-ERROR.
  RETURN (IF AVAILABLE _File THEN "0" ELSE "1").
